From feb2161a60fb3e22f529790bdb6eca86dae49398 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Mon, 17 May 2004 22:49:26 +0000 Subject: [PATCH] (face_at_buffer_position): Use GET_OVERLAYS_AT. --- src/xfaces.c | 18 +----------------- 1 file changed, 1 insertion(+), 17 deletions(-) diff --git a/src/xfaces.c b/src/xfaces.c index ac44f3317ce..2bd3f31d6ea 100644 --- a/src/xfaces.c +++ b/src/xfaces.c @@ -7297,24 +7297,8 @@ face_at_buffer_position (w, pos, region_beg, region_end, /* Look at properties from overlays. */ { int next_overlay; - int len; - - /* First try with room for 40 overlays. */ - len = 40; - overlay_vec = (Lisp_Object *) alloca (len * sizeof (Lisp_Object)); - noverlays = overlays_at (pos, 0, &overlay_vec, &len, - &next_overlay, NULL, 0); - - /* If there are more than 40, make enough space for all, and try - again. */ - if (noverlays > len) - { - len = noverlays; - overlay_vec = (Lisp_Object *) alloca (len * sizeof (Lisp_Object)); - noverlays = overlays_at (pos, 0, &overlay_vec, &len, - &next_overlay, NULL, 0); - } + GET_OVERLAYS_AT (pos, overlay_vec, noverlays, &next_overlay, 0); if (next_overlay < endpos) endpos = next_overlay; } -- 2.30.2